Profile of (eval 273)[Sub/Quote.pm:3]

Filename	(eval 273)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 15 statements in 136µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	16µs	22µs	Method::Generate::Accessor::_Generated::BEGIN@20.126
1	1	1	5µs	14µs	JSON::Schema::Modern::Document::BEGIN@6
1	1	1	5µs	5µs	Method::Generate::Accessor::_Generated::BEGIN@11.125
1	1	1	4µs	13µs	Method::Generate::Accessor::_Generated::BEGIN@19
0	0	0	0s	0s	JSON::Schema::Modern::Document::_set_evaluator

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	1µs			my $isa_check_for_evaluator = ${$_[1]->{"\$isa_check_for_evaluator"}};
3	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4	1	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
5					package JSON::Schema::Modern::Document;
6	2	32µs	2	23µs	# spent 14µs (5+9) within JSON::Schema::Modern::Document::BEGIN@6 which was called: # once (5µs+9µs) by Sub::Quote::_clean_eval at line 6 no warnings 'closure'; # spent 14µs making 1 call to JSON::Schema::Modern::Document::BEGIN@6 # spent 9µs making 1 call to warnings::unimport
7					sub _set_evaluator {
8					($_QUOTED,$_UNQUOTED) if 0;
9					# BEGIN quote_sub PRELUDE
10					package Method::Generate::Accessor::_Generated;
11					# spent 5µs within Method::Generate::Accessor::_Generated::BEGIN@11.125 which was called: # once (5µs+0s) by Sub::Quote::_clean_eval at line 16 BEGIN {
12	1	1µs			$^H = 1762;
13	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
14	1	3µs			%^H = (
15					);
16	1	15µs	1	5µs	} # spent 5µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@11.125
17					# END quote_sub PRELUDE
18					scalar do { my $value = $_[1];
19	2	45µs	2	22µs	# spent 13µs (4+9) within Method::Generate::Accessor::_Generated::BEGIN@19 which was called: # once (4µs+9µs) by Sub::Quote::_clean_eval at line 19 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[JSON::Schema::Modern]))) or Type::Tiny::_failed_check($isa_check_for_evaluator, "InstanceOf[\"JSON::Schema::Modern\"]", $value, "attribute_name","evaluator","attribute_step","isa check","mgaca","0","varname","\$self->{\"evaluator\"}"); $value }), # spent 13µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@19 # spent 9µs making 1 call to warnings::unimport
20	2	36µs	2	28µs	# spent 22µs (16+6) within Method::Generate::Accessor::_Generated::BEGIN@20.126 which was called: # once (16µs+6µs) by Sub::Quote::_clean_eval at line 20 (do { Scalar::Util::weaken($_[0]->{"evaluator"} = $value); no warnings 'void'; $_[0]->{"evaluator"} }), # spent 22µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@20.126 # spent 6µs making 1 call to warnings::unimport
21					($_[0]->{"evaluator"}),
22					} }
23	1	0s			$$_UNQUOTED = \&_set_evaluator;
24					}
25	1	3µs			1;
26
27					;